;------------------------------------------------------------
;
; Events file for Kyokujitsu
;
; By: DarthVeda
; June 28, 2002
; Last Change: Version .9b
; Events for November 1941 - February 1942
; Copyright (C) 2000, 2001, 2002
;
;------------------------------------------------------------

;------------------------------------------------------------
; Flags Used
;
; The following flags have been used.
;
; ***Red Army***
; - Cease-Fire Active - Flag Tech 25 (93)
; ***Chinese***
; 0 - Objective
; 1 - Wuhan Surprise already tripped
; - Nanking Captured Early - Flag Tech 1 (33)
; - Communist Base - Flag Tech 2 (36)
; - Southern Offensive - Flag Tech 4 (40)
; - Wuhan Surprise - Flag Tech 5 (41)
; ***IJA***
; 0 - No Moscow fall
; 1 - Philippine resistance
; 2 - Manila Captured
; - Australia Defense Plan - Flag Tech 4 (40)
; - Defeat Russia #2 - Flag Tech 3 (39)
; - Defeat Russia #1 - Flag Tech 2 (36)
; - Built IJA Conscriptor = Flag Tech 1 (33)
; ***IJN***
; 0 - Conscriptor Bonus for Army/Navy
; - Built IJN Conscriptor - Flag Tech 1 (33)
; - Have IJN Air Factory - Flag Tech 2 (39) 
;
;------------------------------------------------------------

@BEGINEVENTS

@DEBUG

@INITFLAG

;------------------------------------------------------------
;
; Unit Placing Events
;
; Events that place additional units at the start of the scen
;
;------------------------------------------------------------

@IF
ScenarioLoaded
@THEN
JustOnce
CreateUnit
owner=Allies
unit=F2A Buffalo
veteran=No
homecity=Batavia
locations
23,109,0
endlocations
@ENDIF

@IF
ScenarioLoaded
@THEN
JustOnce
CreateUnit
owner=Allies
unit=Dutch Infantry
Count=3
veteran=No
homecity=Batavia
locations
23,109,0
endlocations
@ENDIF

@IF
ScenarioLoaded
@THEN
JustOnce
CreateUnit
owner=Allies
unit=Dutch Infantry
veteran=No
homecity=Surabaya
locations
31,119,0
endlocations
@ENDIF

@IF
ScenarioLoaded
@THEN
JustOnce
CreateUnit
owner=Allies
unit=Artillery
veteran=No
homecity=Surabaya
locations
31,119,0
endlocations
@ENDIF

;------------------------------------------------------------
;
; Flag Events
;
; Flag managing events.
;
;------------------------------------------------------------

@IF
ScenarioLoaded
@AND
ReceivedTechnology
receiver=Chinese
technology=41
@THEN
Flag
Continuous
who=Chinese
state=On
flag=1
@ENDIF

;------------------------------------------------------------
;
; Equalizer Events
;
; Event to keep national economy from inflating like crazy
;
;------------------------------------------------------------

@IF
Turn
turn=Every
@THEN
Changemoney
receiver=IJA
amount=-180
@ENDIF

@IF
Turn
turn=Every
@THEN
Changemoney
receiver=IJN
amount=-180
@ENDIF

;------------------------------------------------------------
;
; Negotiations Event
;
; Prevent the cowardly AI's from making peace and what not
;
;------------------------------------------------------------

@IF
Negotiation
talker=Anybody
talkertype=HumanOrComputer
listener=Anybody
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
Turn
turn=Every
@THEN
MakeAgression
who=Chinese
whom=IJA
@ENDIF

@IF
Turn
turn=Every
@THEN
MakeAgression
who=Chinese
whom=IJN
@ENDIF

; No invading Russia!

@IF
CityTaken
city=AnyCity
attacker=IJA
defender=Red Army
@THEN
Text
^ Your violoation of the cease-fire with Russia has
cost you your job.  YOU HAVE BEEN RELIEVED.
endtext
DestroyACivilization
whom=IJA
@ENDIF

@IF
CityTaken
city=AnyCity
attacker=IJN
defender=Red Army
@THEN
Text
^ Your violoation of the cease-fire with Russia has
cost you your job.  YOU HAVE BEEN RELIEVED.
endtext
DestroyACivilization
whom=IJN
@ENDIF

;------------------------------------------------------------
;
; Japanese Requesition Events
;
; The following events will allow the Japanese player to
; acquire additional units
;
;------------------------------------------------------------

;Begin IJA Infantry

@IF
ReceivedTechnology
receiver=IJA
technology=51
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=3
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=50
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=3
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=49
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=2
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=48
@THEN
CreateUnit
owner=IJA
unit=Nipponese
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=51
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=51
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=50
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=50
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=49
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=49
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=48
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=48
@ENDIF

; end of IJA Infantry
; Begin IJA Fighters
 
@IF
ReceivedTechnology
receiver=IJA
technology=58
@THEN
CreateUnit
owner=IJA
unit=Ki-43 Oscar
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=52
@THEN
CreateUnit
owner=IJA
unit=Ki-43 Oscar
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=52
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=52
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=58
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=58
@ENDIF

; end IJA fighters
; Begin IJA Ground Equipment

@IF
ReceivedTechnology
receiver=IJA
technology=62
@THEN
CreateUnit
owner=IJA
unit=Artillery
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=62
@THEN
CreateUnit
owner=IJA
unit=Armored Infantry
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=61
@THEN
CreateUnit
owner=IJA
unit=Artillery
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=61
@THEN
CreateUnit
owner=IJA
unit=Armored Infantry
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=61
@THEN
ChangeMoney
receiver=IJA
amount=-65
TakeTechnology
whom=IJA
technology=61
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=62
@THEN
ChangeMoney
receiver=IJA
amount=-65
TakeTechnology
whom=IJA
technology=62
@ENDIF

; end IJA ground equipment
; Begin IJA Armored 

@IF
ReceivedTechnology
receiver=IJA
technology=85
@THEN
CreateUnit
owner=IJA
unit=Type 97 Tank
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=85
@THEN
ChangeMoney
receiver=IJA
amount=-65
TakeTechnology
whom=IJA
technology=85
@ENDIF

; end IJA Armored
; Begin IJA Bombers

@IF
ReceivedTechnology
receiver=IJA
technology=63
@THEN
CreateUnit
owner=IJA
unit=Ki-21 Sally
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=64
@THEN
CreateUnit
owner=IJA
unit=Ki-21 Sally
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=63
@THEN
ChangeMoney
receiver=IJA
amount=-120
TakeTechnology
whom=IJA
technology=63
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=64
@THEN
ChangeMoney
receiver=IJA
amount=-120
TakeTechnology
whom=IJA
technology=64
@ENDIF

; end IJA Bombers
; Begin IJA Attack Aircraft

@IF
ReceivedTechnology
receiver=IJA
technology=65
@THEN
CreateUnit
owner=IJA
unit=Ki-51 Sonia
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=68
@THEN
CreateUnit
owner=IJA
unit=Ki-51 Sonia
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=65
@THEN
ChangeMoney
receiver=IJA
amount=-100
TakeTechnology
whom=IJA
technology=65
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=68
@THEN
ChangeMoney
receiver=IJA
amount=-100
TakeTechnology
whom=IJA
technology=68
@ENDIF

; end of IJA Attack Aircraft
; Being IJA Transports

@IF
ReceivedTechnology
receiver=IJA
technology=99
@THEN
CreateUnit
owner=IJA
unit=Transport
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=98
@THEN
CreateUnit
owner=IJA
unit=Transport
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=99
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=99
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=98
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=98
@ENDIF

; end of IJA Transports
; Begin IJN Infantry

@IF
ReceivedTechnology
receiver=IJN
technology=51
@THEN
CreateUnit
owner=IJN
unit=Marines
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=50
@THEN
CreateUnit
owner=IJN
unit=Marines
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=49
@THEN
CreateUnit
owner=IJN
unit=Marines
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=48
@THEN
CreateUnit
owner=IJN
unit=Marines
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=51
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=51
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=50
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=50
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=49
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=49
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=48
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=48
@ENDIF

; end IJN Infantry
; Begin IJN Fighter

@IF
ReceivedTechnology
receiver=IJN
technology=58
@THEN
CreateUnit
owner=IJN
unit=A5M Claude
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=52
@THEN
CreateUnit
owner=IJN
unit=A6M2 Zero-Sen
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=58
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=58
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=52
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=52
@ENDIF

; end IJN Fighter
; Begin IJN Ground Equipment

@IF
ReceivedTechnology
receiver=IJN
technology=62
@THEN
CreateUnit
owner=IJN
unit=Artillery
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=61
@THEN
CreateUnit
owner=IJN
unit=Artillery
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=62
@THEN
ChangeMoney
receiver=IJN
amount=-65
TakeTechnology
whom=IJN
technology=62
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=62
@THEN
ChangeMoney
receiver=IJN
amount=-65
TakeTechnology
whom=IJN
technology=62
@ENDIF

; end IJN Ground Equipment
; begin IJN Bomber

@IF
ReceivedTechnology
receiver=IJN
technology=63
@THEN
CreateUnit
owner=IJN
unit=G4M1 Betty
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=64
@THEN
CreateUnit
owner=IJN
unit=G4M1 Betty
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=63
@THEN
ChangeMoney
receiver=IJN
amount=-120
TakeTechnology
whom=IJN
technology=63
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=64
@THEN
ChangeMoney
receiver=IJN
amount=-120
TakeTechnology
whom=IJN
technology=64
@ENDIF

; end of IJN Bombers
; Begin IJN IJN Attack Aircraft

@IF
ReceivedTechnology
receiver=IJN
technology=65
@THEN
CreateUnit
owner=IJN
unit=D3A1 Val
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=68
@THEN
CreateUnit
owner=IJN
unit=B5N2 Kate
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=65
@THEN
ChangeMoney
receiver=IJN
amount=-100
TakeTechnology
whom=IJN
technology=65
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=68
@THEN
ChangeMoney
receiver=IJN
amount=-100
TakeTechnology
whom=IJN
technology=68
@ENDIF

; end of IJN Attack Aircraft
; Begin IJN Transports

@IF
ReceivedTechnology
receiver=IJN
technology=99
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=98
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=99
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=99
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=98
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=98
@ENDIF

; end IJN Transports
; Begin IJN Submarines

@IF
ReceivedTechnology
receiver=IJN
technology=88
@THEN
CreateUnit
owner=IJN
unit=C-1 Sub
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=88
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=88
@ENDIF

; end IJN Submarines
; Begin IJN Light Cruisers

@IF
ReceivedTechnology
receiver=IJN
technology=90
@THEN
CreateUnit
owner=IJN
unit=Light Cruiser
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=91
@THEN
CreateUnit
owner=IJN
unit=Light Cruiser
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=90
@THEN
ChangeMoney
receiver=IJN
amount=-320
TakeTechnology
whom=IJN
technology=90
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=91
@THEN
ChangeMoney
receiver=IJN
amount=-320
TakeTechnology
whom=IJN
technology=91
@ENDIF

; end of IJN Light Cruisers
; begin IJN Destroyers

@IF
ReceivedTechnology
receiver=IJN
technology=94
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=95
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=96
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=97
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=94
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=94
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=95
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=95
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=96
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=96
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=97
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=97
@ENDIF

;------------------------------------------------------------
; Historical Events
;
; The following events help carve history through China
;
;------------------------------------------------------------

@IF
ScenarioLoaded
@THEN
JustOnce
Transport
unit=Ki-51 Sonia
state=On
mode=Use
type=0
@ENDIF

@IF
ScenarioLoaded
@THEN
JustOnce
Transport
unit=Ki-51 Sonia
state=On
mode=Use
type=1
@ENDIF

@IF
ScenarioLoaded
@THEN
JustOnce
Transport
unit=Ki-51 Sonia
state=On
mode=Use
type=2
@ENDIF

@IF
ScenarioLoaded
@THEN
JustOnce
Text
^------------------------- Briefing -------------------------
endtext
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
Text
^ High command has given you the simple objective this month
of destroying at least one American battleship at anchor
at Pearl Harbor.  High command has promised a significant
reward for each Battleship destroyed in December.  
endtext
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
Text
^ With Russia in the war against Germany, and China's
one lifeline with the world hundreds of miles away from
the front lines, the KMT has been forced to abandon
its offensive strategy and revert to a defensive role.  
endtext
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
Text
^ Many Chinese infantry have dug into a defensive position,
forming stronghold positions across the country.  Many other
Chinese have turned to partisan tactics to hamper the Japanese
in China.  High Command has also noticed increased partisan
activities in French Indochina and on the island of Formosa. 
endtext
@ENDIF

@IF
Turn
turn=55 
@THEN
Text
^ High command informs you that the IJN Yamato, the largest
battleship in the world, has completed building and is
ready for service in the Navy.
endtext
CreateUnit
owner=IJN
unit=Dreadnought
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
CreateUnit
owner=IJN
unit=Australian Infantry
Count=2
veteran=No
homecity=None
locations
77,147,0
endlocations
@ENDIF

@IF
ScenarioLoaded
@THEN
JustOnce
Text
^^---------------------- Technology Update ----------------------
^
^ Technicians are pleased to inform you that they have specially
modified the torpedoes for the B5N2 so that you may attack
Pearl Harbor with B5N2 aircraft.  (After the next file change
you will no longer be able to attack ships moored in harbor
with torpedo aircraft).
^
^---------------------------------------------------------------
endtext
@ENDIF

;-------------------------------
;
; Wonder Effects
;
;-------------------------------

; Conscriptor randomizer

@IF
RandomTurn
denominator=12
@AND
Turn
turn=57
@THEN
Flag
who=IJN
state=On
flag=0
@ENDIF

; Naval Conscriptor
@IF
CityProduction
builder=IJN
improvement=44
@THEN
GiveTechnology
technology=33
receiver=IJN
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJN
@AND
CheckFlag
who=IJN
flag=0
State=On
@THEN
CreateUnit
owner=IJN
unit=Marines
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
Text
^The IJN has conscripted 2 Extra Marines this season!
endtext
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJN
@AND
Turn
turn=57
@THEN
CreateUnit
owner=IJN
unit=Marines
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

; Army Conscriptor
@IF
CityProduction
builder=IJA
improvement=66
@THEN
GiveTechnology
technology=33
receiver=IJA
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJA
@AND
CheckFlag
who=IJN
flag=0
State=On
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=2
veteran=No
homecity=None
locations
78,80,1
endlocations
Text
^The army reports recruitments are up! Two more
^Infantry units were recruited this month.
endtext
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJA
@AND
Turn
turn=57
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=2
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

; - Naval Air Factory -- This will slow down at the end of this events file.

@IF
ReceivedTechnology
technology=39
receiver=IJN
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=IJN
unit=A6M2 Zero-Sen
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
technology=39
receiver=IJN
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=IJN
unit=D3A1 Val
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
technology=39
receiver=IJN
@AND
RandomTurn
denominator=4
@THEN
CreateUnit
owner=IJN
unit=B5N2 Kate
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
technology=39
receiver=IJN
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=IJN
unit=G4M1 Betty
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

;-------------------------------
;
; Historical Events
;
; Now with not so historical events! :)
;
;-------------------------------

@IF
Turn
turn=54
@THEN
Text
^ The Kingdom of Thailand has declared its support for 
the Japanese Empire and has promised a division of troops
every six months starting next quarter.
endtext
@ENDIF

@IF
UnitKilled
unit=Corregidor
attacker=Anybody
Defender Only
defender=Anybody
@THEN
Text
^ The key to Manila harbor, Corregidor island,
has fallen to the Japanese under heavy aerial
and sea bombardment.  In one of the most
famous media shots of the war, Japanese soldiers
are seen shouting 'Bonzai' near one of Corregidor's
once mighty naval cannons.
endtext
PlayWaveFile
Explosion.wav
@ENDIF

@IF
CityTaken
city=Rabaul
attacker=Anybody
defender=Anybody
@THEN
Just Once
Text
^ Rabaul falls to advancing Japanese troops.  Japanese planners
suggest using it as a prime staging area for convoys and air
attacks on Guinea and Australia.
endtext
@ENDIF

@IF
CityTaken
city=Port Moresby
attacker=Anybody
defender=Anybody
@THEN
Just Once
Text
^ The critical city of Port Moresby has fallen to Japanese troops,
Australia has lost its most important foothold in Guinea.  Australian
troops begin preparations for the worst.  
endtext
CreateUnit
owner=Allies
unit=Australian Infantry
Count=2
veteran=Yes
homecity=None
locations
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

@IF
CityTaken
city=Kuala Lumpur
attacker=Anybody
defender=Anybody
@THEN
Just Once
Text
^ With the fall of Kuala Lumpur, British, Australian, and Chinese
troops fall back to the city of Singapore, where they are surrounded
a few days later.  The Japanese commander, Tomoyuku Yamashita, is in
complete control of the city's water resevoirs from the outskirts.
endtext
ChangeTerrain
Map=0
terraintype=3
maprect
28,92,28,92,28,92,28,92
@ENDIF

@IF
CityTaken
city=Kuala Lumpur
attacker=Anybody
defender=Anybody
@THEN
Just Once
Text
^ Even though the British garrison and their allies outnumber the
invading Japanese force by a margin of 3:1, the lack of proper facing
defence artillery and the threat of an urban disaster for lack of water
forces General Percival to surrender the city and his forces to the
Japanese.  Many are hauled away to serve in Japanese labor camps.  The
Japanese navy seizes stores of every kind and size when entering Singapore,
which is renamed to "Soyonan-to," or Light of the South.
endtext
CreateUnit
owner=IJA
unit=Slave Labor
Count=5
veteran=No
homecity=None
locations
42,72,0
endlocations
@ENDIF

@IF
CityTaken
city=Sandakan
attacker=Anybody
defender=Anybody
@THEN
Just Once
Text
^ The Dutch and British, realizing their position in Borneo
is completely unteniable, have chosen to destroy refineries
and oil processing facilities In Borneo rather than let the
Japanese simply take them.
endtext
CreateUnit
owner=Allies
unit=Rubble
veteran=No
homecity=None
locations
53,97,0
endlocations
@ENDIF

@IF
CityTaken
city=Sandakan
attacker=Anybody
defender=Anybody
@THEN
Just Once
CreateUnit
owner=Allies
unit=Rubble
veteran=No
homecity=None
locations
55,101,0
endlocations
@ENDIF

@IF
CityTaken
city=Bandjamasin
attacker=Anybody
defender=Anybody
@THEN
JustOnce
CreateUnit
owner=Allies
unit=Rubble
veteran=No
homecity=None
locations
36,114,0
endlocations
@ENDIF

@IF
CityTaken
city=Pontianak
attacker=Anybody
defender=Anybody
@THEN
JustOnce
CreateUnit
owner=Allies
unit=Rubble
veteran=No
homecity=None
locations
35,103,0
endlocations
@ENDIF

@IF
CityTaken
city=Burnai
attacker=Anybody
defender=Anybody
@THEN
JustOnce
CreateUnit
owner=Allies
unit=Rubble
veteran=No
homecity=None
locations
43,99,0
endlocations
@ENDIF

@IF
CityTaken
city=Surabaya
attacker=Anybody
defender=Anybody
@THEN
JustOnce
CreateUnit
owner=Allies
unit=Rubble
veteran=No
homecity=None
locations
28,118,0
endlocations
@ENDIF

@IF
Turn
turn=54
@THEN
CreateUnit
owner=Allies
unit=Cruiser CL
Count=2
veteran=No
homecity=Batavia
locations
24,106,0
endlocations
@ENDIF

@IF
Turn
turn=54
@THEN
CreateUnit
owner=Allies
unit=Destroyer DD
Count=2
veteran=No
homecity=Surabaya
locations
25,107,0
endlocations
@ENDIF

@IF
Turn
turn=54
@THEN
CreateUnit
owner=Allies
unit=Destroyer DD
veteran=No
homecity=Surabaya
locations
32,116,0
endlocations
@ENDIF

@IF
CityTaken
city=Batavia
attacker=Anybody
defender=Anybody
@THEN
JustOnce
Text
^ Batavia falls, and with it, the battle for the Dutch East Indies is seemingly
over.  A squadron of destroyers and cruisers is easily pushed aside by the the
IJN and persued until destroyed.  The economic jewel of the DEI has been securely
placed into Japanese custody.
endtext
@ENDIF

@IF
Turn
turn=54
@THEN
CreateUnit
owner=Allies
unit=F4F-3 Wildcat
veteran=No
homecity=None
locations
91,115,1
endlocations
@ENDIF

@IF
CityTaken
city=Wake
attacker=Anybody
defender=Allies
@THEN
Just Once
Text
^ Wake falls to Japanese marines in some of the bloodiest fighting
so far between the U.S. and Japan.  A single squadron of American
F4F's was able to hold of the Japanese offensive for two weeks.
endtext
@ENDIF

@IF
CityTaken
city=Midway
attacker=Anybody
defender=Allies
@THEN
Just Once
Text
^ With the fall of Midway, Japan adds yet one more defensive
outpost to her fortress that is the Pacific.
endtext
@ENDIF

@IF
Turn
turn=54
@THEN
CreateUnit
owner=Allies
unit=B-17 Flying Fort
Count=2
veteran=No
homecity=Manila
locations
78,82,0
endlocations
@ENDIF

@IF
CityTaken
city=Manila
attacker=Anybody
defender=Anybody
@THEN
Just Once
Text
^ Manila falls without a trace of the U.S. army or Filipino defenders,
and it is later learned that over 80,000 U.S. personnel and their
Filipino allies have evacuated to Bataan.  Manila bay itself remains
blockaded by the Island fortress of Corregidor.
endtext
CreateUnit
owner=Allies
unit=G.I.
Count=5
veteran=No
homecity=None
locations
75,81,0
endlocations
Flag
Continuous
who=IJA
state=On
flag=2
@ENDIF

@IF
CityTaken
city=Manila
attacker=Anybody
defender=Anybody
@THEN
Just Once
CreateUnit
owner=Allies
unit=G.I.
Count=5
veteran=No
homecity=None
locations
76,80,0
endlocations
@ENDIF

@IF
CityTaken
city=Manila
attacker=Anybody
defender=Anybody
@THEN
Just Once
CreateUnit
owner=Allies
unit=Allied General
veteran=No
homecity=None
locations
75,81,0
endlocations
@ENDIF

@IF
UnitKilled
unit=Allied General
attacker=Anybody
Defender Only
defender=Allies
@THEN
Text
^ The allies in Bataan finally succomb to relentless
Japanese assaults, aerial and sea bombardments.  MacArthur,
upon leaving the Philippines, announces "I shall return!"  The surrender
of the remaining forces in the Philippines brings about the end
to organized resistance in the Philippines.
endtext
Flag
Continuous
who=IJA
state=On
flag=1
CreateUnit
owner=IJA
unit=Slave Labor
Count=3
veteran=No
homecity=None
locations
78,82,0
endlocations
@ENDIF

@IF
UnitKilled
unit=Allied General
attacker=Anybody
Defender Only
defender=Allies
@THEN
Text
^ Soldiers captured on Bataan are taken prisoner and forced
into labor gangs in the Philippines.  More than six hundred
Americans die, as do thousands of Filipinos in what becomes 
known as the Bataan Death March.
endtext
@ENDIF

@IF
Turn
turn=Every
@AND
CheckFlag
who=IJA
flag=1
State=Off
@THEN
CreateUnit
owner=Allies
unit=Leathernecks
veteran=No
homecity=None
Randomize
locations
80,78,0
79,87,0
82,94,0
80,104,0
76,106,0
endlocations
@ENDIF

@IF
CheckFlag
who=IJA
flag=2
State=On
@AND
CheckFlag
who=IJA
flag=1
State=Off
@THEN
CreateUnit
owner=Allies
unit=P-40C Warhawk
veteran=No
homecity=None
locations
75,81,0
endlocations
@ENDIF

@IF
Turn
turn=54
@THEN
CreateUnit
owner=Allies
unit=Dreadnought DBB
Count=2
veteran=No
homecity=None
Randomize
locations
30,96,0
31,97,0
30,98,0
29,97,0
endlocations
@ENDIF

@IF
UnitKilled
unit=Dreadnought DBB
attacker=Anybody
Defender Only
defender=Anybody
@THEN
JustOnce
Text
^ The HMS Prince of Wales and HMS Repulse, which
had been sailing to attack a suspected Japanese
convoy in the area.  However, instead they met
with Japanese attack.  Both ships eventually
succombed to the assault and slipped beneath the
sea.
endtext
@ENDIF

@IF
UnitKilled
unit=Battleship BB
attacker=IJN
Defender Only
defender=Allies
@THEN
JustOnce
Text
^ The attack on Pearl Harbor has begun the Americans
are caught completely by surprise.  Many ships are lost
in the morning hours of December 7th (it is worth
noting that it is the 8th in Japan).
^America declares war on Japan the following day...
endtext
PlayWaveFile
Infamy.wav
@ENDIF

@IF
Turn
turn=55
@THEN
CreateUnit
owner=Allies
unit=B-17 Flying Fort
Count=4
veteran=Yes
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=55
@THEN
CreateUnit
owner=Allies
unit=P-40C Warhawk
Count=5
veteran=Yes
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=55
@THEN
CreateUnit
owner=Allies
unit=SBD-3 Dauntless
Count=4
veteran=Yes
homecity=None
locations
95,121,3
endlocations
@ENDIF

@IF
Turn
turn=55
@THEN
CreateUnit
owner=Allies
unit=SBD-3 Dauntless
Count=4
veteran=Yes
homecity=None
locations
65,95,3
endlocations
@ENDIF

@IF
Turn
turn=55
@THEN
CreateUnit
owner=Allies
unit=Gato Sub
Count=4
veteran=Yes
homecity=Wake
Randomize
locations
65,95,3
endlocations
@ENDIF

@IF
Turn
turn=55
@THEN
CreateUnit
owner=Allies
unit=Bunker
Count=3
veteran=Yes
homecity=None
locations
95,121,3
endlocations
@ENDIF

; the war in Europe

@IF
ReceivedTechnology
receiver=IJA
technology=36
@AND
ReceivedTechnology
receiver=IJA
technology=39
@THEN
JustOnce
Text
^^------------ The War in Europe -------------
^ The defenders of Moscow, outnumbered, outmaneuvered
and overwhelmed, finally give up in late November. It
has been a long fought battle but the Germans have 
reached their goal of Moscow before General winter
staved them off.  It is reported that Stalin has fled
to the safety of the Ural mountains and will continue
the fight from there.
^^--------------------------------------------
endtext
Flag
Continuous
who=IJA
state=On
flag=0
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=36
@AND
ReceivedTechnology
receiver=IJA
technology=39
@THEN
JustOnce
Text
^^------------ The War in Europe -------------
^ The Germans predict that the war for Russia
will soon be over.
^^--------------------------------------------
endtext
@ENDIF

@IF
Turn
turn=54
@AND
CheckFlag
who=IJA
flag=0
state=Off
@THEN
Text
^^------------ The War in Europe -------------
^ The Germans report that they have not been
able to capture Moscow and that the Russians
have launched a full-fledged counter-offensive
on the entire front.  The Germans have dug in
for what will no doubt be a long war.
^^--------------------------------------------
endtext
@ENDIF

;-------------------------------
;
; U.S. submarine force
;
;-------------------------------

@IF
Turn
turn=56
@THEN
Text
^ The only U.S. naval service that remains active
in the Pacific in the first months of the war is the
submarine force.  Although an effective force, they
remain plagued by the problems of the Mark 14 torpedo.
This torpedo has more duds than live rounds due to its
faulty detonator.
endtext
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Allies
unit=Gato Sub
veteran=Yes
homecity=Manila
Randomize
locations
70,66,0
69,75,0
62,84,0
71,79,0
endlocations
@ENDIF

@IF
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Allies
unit=Gato Sub
veteran=Yes
homecity=Surabaya
Randomize
locations
29,109,0
22,106,0
32,114,0
26,100,0
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Allies
unit=Gato Sub
veteran=Yes
homecity=Darwin
Randomize
locations
64,132,0
72,128,0
81,113,0
85,135,0
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Allies
unit=Gato Sub
veteran=Yes
homecity=Townsville
Randomize
locations
21,143,1
23,153,1
34,164,1
36,145,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Allies
unit=Gato Sub
veteran=Yes
homecity=Guam
Randomize
locations
34,68,1
40,82,1
43,109,1
40,48,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Allies
unit=Gato Sub
veteran=Yes
homecity=Wake
Randomize
locations
78,112,1
84,96,1
80,114,1
43,113,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Allies
unit=Gato Sub
veteran=Yes
homecity=Midway
Randomize
locations
87,115,1
55,63,1
85,115,1
82,140,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Allies
unit=Gato Sub
veteran=Yes
homecity=Pearl Harbor
Randomize
locations
87,91,1
81,171,1
14,64,1
44,96,1
endlocations
@ENDIF

;-------------------------------
;
; Regular Chinese Army Movements
;
;-------------------------------

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=P-40C Warhawk
veteran=Yes
homecity=None
locations
16,18,1
85,29,0
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
42,22,1
40,26,1
45,25,1
43,33,1
43,29,1
40,20,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
43,29,1
43,33,1
45,25,1
40,26,1
42,22,1
40,20,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=1
veteran=Yes
homecity=None
Randomize
locations
51,21,1
46,32,1
37,37,1
40,20,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
Count=4
veteran=Yes
homecity=None
Randomize
locations
30,16,1
34,16,1
29,23,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
Count=2
veteran=Yes
homecity=None
Randomize
locations
35,15,1
38,16,1
26,18,1
32,20,1
endlocations
@ENDIF

; The next two events control guerillas between Loyang and Wuhan

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
Count=2
veteran=Yes
homecity=None
Randomize
locations
18,32,1
21,33,1
17,31,1
19,35,1
16,32,1
19,39,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
veteran=No
homecity=None
Randomize
locations
18,32,1
21,33,1
17,31,1
19,35,1
16,32,1
19,39,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
15,17,17,17,17,19,15,19
moveto
30,34
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
15,17,17,17,17,19,15,19
moveto
30,34
numbertomove=All
@ENDIF

@IF
Turn
turn=Every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
11,33,19,33,19,41,11,41
moveto
41,39
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
11,33,19,33,19,41,11,41
moveto
41,39
numbertomove=All
@ENDIF

@IF
RandomTurn
denominator=6
@THEN
CreateUnit
owner=Chinese
unit=Artillery
veteran=Yes
homecity=None
locations
15,37,1
7,37,1
2,40,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
locations
15,37,1
7,37,1
2,40,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=4
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
15,37,1
7,37,1
2,40,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Artillery
attacker=Anybody
Defender Only
defender=Chinese
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
11,55,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Artillery
attacker=Anybody
defender=Chinese
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
10,54,12,54,12,56,10,56
moveto
46,22
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
15,17,17,17,17,19,15,19
moveto
32,20
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
31,19,33,19,33,21,31,21
moveto
25,41
numbertomove=All
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
3,49,1
2,40,1
5,53,1
7,49,1
7,53,1
3,45,1
4,42,1
1,51,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
5,53,1
7,49,1
7,53,1
3,45,1
4,42,1
1,51,1
3,49,1
2,40,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
2,40,1
5,53,1
7,49,1
7,53,1
3,45,1
4,42,1
1,51,1
3,49,1
endlocations
@ENDIF

@IF
Turn
turn=every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
0,40,10,40,10,54,0,54
moveto
30,48
numbertomove=All
@ENDIF

; The following events control the regular army moving from Changsha

@IF
Turn
turn=every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
5,33,9,33,9,39,5,39
moveto
46,22
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
Map=1
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
5,33,9,33,9,39,5,39
moveto
46,22
numbertomove=All
@ENDIF

;-------------------------------
;
; - Southern Defense Force
;
;-------------------------------


@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
Count=2
veteran=No
homecity=None
locations
74,38,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
veteran=Yes
homecity=None
locations
74,38,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=No
homecity=None
locations
74,38,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=No
homecity=None
locations
74,36,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=Yes
homecity=None
locations
85,29,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=0
maprect
73,37,75,37,75,39,73,39
moveto
86,48
numbertomove=All
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
96,42,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=Yes
homecity=None
locations
96,42,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=0
maprect
95,41,97,41,97,43,95,43
moveto
71,49
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=Chinese Irregulars
Map=0
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
veteran=Yes
homecity=None
Randomize
locations
76,48,0
92,40,0
80,38,0
78,44,0
91,45,0
94,54,0
83,43,0
endlocations
@ENDIF

@IF
UnitKilled
unit=AnyUnit
Map=0
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
71,39,81,39,81,55,71,55
moveto
71,49
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
Map=0
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
81,35,97,35,97,61,81,61
moveto
86,48
numbertomove=All
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
71,39,81,39,81,55,71,55
moveto
71,49
numbertomove=All
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
81,35,97,35,97,61,81,61
moveto
86,48
numbertomove=All
@ENDIF

;------------------------------------------------------------
;
; Australian Defense
;
; This is where we figure out how the Australians are to
; defend themselves.
;
;------------------------------------------------------------

@IF
CityTaken
city=Sydney
attacker=Anybody
defender=Allies
@THEN
JustOnce
Text
^ Among shock and disbelief in Australia, Sydney falls to
Japanese invaders.  Conscripts around the country rally
to the defense of Australia.
endtext
GiveTechnology
technology=40
receiver=IJA
CreateUnit
owner=Allies
unit=UK Infantry
Count=2
veteran=Yes
homecity=None
locations
99,195,1
99,193,1
99,197,1
endlocations
@ENDIF

@IF
CityTaken
city=Sydney
attacker=Anybody
defender=Allies
@THEN
JustOnce
CreateUnit
owner=Allies
unit=Australian Infantry
Count=4
veteran=Yes
homecity=None
locations
99,195,1
99,193,1
99,197,1
endlocations
@ENDIF

@IF
CityTaken
city=Darwin
attacker=Anybody
defender=Allies
@THEN
JustOnce
Text
^ The city of Darwin in northern Australia falls to Japanese invaders!  Australians
flee their homes to escape the Japanese!
endtext
GiveTechnology
technology=40
receiver=IJA
CreateUnit
owner=Allies
unit=Australian Infantry
Count=2
veteran=Yes
homecity=None
locations
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

@IF
CityTaken
city=Perth
attacker=Anybody
defender=Allies
@THEN
JustOnce
Text
^ With the only major city of Western Australia in Japanese hands,
Australians are quickly losing faith in their government's ability
to stop the onslaught.
endtext
GiveTechnology
technology=40
receiver=IJA
CreateUnit
owner=Allies
unit=Australian Infantry
Count=2
veteran=Yes
homecity=None
locations
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

@IF
CityTaken
city=Adelaide
attacker=Anybody
defender=Allies
@THEN
Text
^ The key city of Adelaide is taken.  Australians everywhere wonder
if there is nothing that can stop the Japanese.
endtext
GiveTechnology
technology=40
receiver=IJA
CreateUnit
owner=Allies
unit=Australian Infantry
Count=2
veteran=Yes
homecity=None
locations
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

@IF
CityTaken
city=Townsville
attacker=Anybody
defender=Allies
@THEN
GiveTechnology
technology=40
receiver=IJA
CreateUnit
owner=Allies
unit=Australian Infantry
Count=2
veteran=Yes
homecity=None
locations
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

@IF
CityTaken
city=Brisbane
attacker=Anybody
defender=Allies
@THEN
Text
^ The city of Brisbane falls to Japanese invaders.  Enraged Australians
quickly sign up for the defense of their homeland.
endtext
GiveTechnology
technology=40
receiver=IJA
CreateUnit
owner=Allies
unit=Australian Infantry
Count=2
veteran=Yes
homecity=None
locations
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

; Eastern Defense

@IF
ReceivedTechnology
receiver=IJA
technology=40
@THEN
CreateUnit
owner=Allies
unit=UK Infantry
veteran=Yes
homecity=None
locations
99,195,1
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=40
@THEN
CreateUnit
owner=Allies
unit=Artillery
veteran=Yes
homecity=None
locations
99,195,1
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=40
@THEN
CreateUnit
owner=Allies
unit=Australian Infantry
Count=2
veteran=Yes
homecity=None
locations
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

; Western Defense

@IF
ReceivedTechnology
receiver=IJA
technology=40
@THEN
CreateUnit
owner=Allies
unit=Australian Infantry
veteran=Yes
homecity=None
locations
77,147,0
73,163,0
63,173,0
64,194,0
65,199,0
97,197,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=40
@THEN
CreateUnit
owner=Allies
unit=UK Infantry
veteran=Yes
homecity=None
locations
77,147,0
73,163,0
63,173,0
64,194,0
65,199,0
97,197,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=40
@THEN
CreateUnit
owner=Allies
unit=Australian Infantry
veteran=Yes
homecity=None
locations
18,168,0
64,194,0
65,199,0
97,197,0
endlocations
@ENDIF

; Simple Attacks

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Allies
unit=Australian Infantry
Count=2
veteran=Yes
homecity=None
locations
17,147,1
17,151,1
15,157,1
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Allies
unit=Artillery
veteran=Yes
homecity=None
locations
17,147,1
17,151,1
15,157,1
3,195,1
8,186,1
4,192,1
5,171,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
unit=AnyUnit
owner=Allies
Map=1
maprect
99,177,5,177,5,199,99,199
moveto
5,171
numbertomove=All
@ENDIF

@IF
Turn
turn=Every
@THEN
unit=AnyUnit
owner=Allies
Map=1
maprect
14,156,16,156,16,158,14,158
moveto
17,147
numbertomove=All
@ENDIF

@IF
Turn
turn=Every
@THEN
unit=AnyUnit
owner=Allies
Map=0
maprect
63,193,67,193,67,199,63,199
moveto
77,147
numbertomove=All
@ENDIF

;------------------------------------------------------------
;
; Communist Area
;
; This area dumps more communists all over the place
;
;------------------------------------------------------------

@IF
UnitKilled
unit=Chinese Irregulars
attacker=Barbarians
Defender Only
defender=Chinese
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
veteran=Yes
homecity=None
Randomize
locations
18,32,1
21,33,1
19,35,1
19,39,1
30,16,1
34,16,1
29,23,1
35,15,1
38,16,1
32,20,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Artillery
attacker=Barbarians
Defender Only
defender=Chinese
@THEN
CreateUnit
owner=Barbarians
unit=Artillery
veteran=Yes
homecity=None
Randomize
locations
18,32,1
21,33,1
19,35,1
19,39,1
30,16,1
34,16,1
29,23,1
35,15,1
38,16,1
32,20,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=4
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
veteran=Yes
homecity=None
Randomize
locations
7,69,1
8,68,1
9,69,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Barbarians
unit=Guerillas
veteran=Yes
homecity=None
Randomize
locations
54,62,0
54,70,0
58,52,0
65,49,0
endlocations
@ENDIF

;------------------------------------------------------------
;
; Objective Area
;
; This rewards the player for meeting various objectives.
;
;------------------------------------------------------------

@IF
UnitKilled
unit=Battleship BB
attacker=IJN
Defender Only
defender=Allies
@THEN
JustOnce
Text
^ High Command congratulates the navy on destroying an
American battleship, and has rewarded them with a gift
of a fast troop ship.  These ships are much faster than
normal transport ships and can carry infantry farther
across the sea.
endtext
@ENDIF

@IF
UnitKilled
unit=Battleship CB
attacker=IJN
Defender Only
defender=Allies
@THEN
CreateUnit
owner=IJN
unit=Tokyo Express
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Battleship CB
attacker=IJN
Defender Only
defender=Allies
@THEN
CreateUnit
owner=IJA
unit=Tokyo Express
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Battleship BB
attacker=IJN
Defender Only
defender=Allies
@THEN
CreateUnit
owner=IJN
unit=Tokyo Express
veteran=No
homecity=None
locations
57,71,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Battleship BB
attacker=IJN
Defender Only
defender=Allies
@THEN
CreateUnit
owner=IJA
unit=Tokyo Express
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

;------------------------------------------------------------
;
; File Change Statement
;
; The part of the program where we make the User work for
; their enjoyment :)
;
;------------------------------------------------------------

@IF
Turn
turn=57
@THEN
Text
^ With the opening of the war against the United States,
high command is drawing up a list of objectives for the
coming months.
endtext
@ENDIF

@IF
Turn
turn=57
@THEN
Text
^You are ready to play part 15 of Kyokujitsu!
endtext
@ENDIF

@ENDEVENTS